﻿Public Class Form1

    Private Sub TiếpNhậnBảoTrìXeToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TiếpNhậnBảoTrìXeToolStripMenuItem.Click
        Dim form2 As New Form2()
        form2.MdiParent = Me
        form2.Show()

    End Sub

    Private Sub LậpPhiếuSửaChữaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LậpPhiếuSửaChữaToolStripMenuItem.Click
        Dim form3 As New Form3()
        form3.MdiParent = Me
        form3.Show()
    End Sub

    Private Sub TraCứuXeToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TraCứuXeToolStripMenuItem.Click
        Dim form4 As New Form4()
        form4.MdiParent = Me
        form4.Show()
    End Sub

    Private Sub ThoátToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ThoátToolStripMenuItem.Click
        If MsgBox("Bạn có muốn thoát không ?", MsgBoxStyle.YesNo, "Thông báo ") = MsgBoxResult.Yes Then
            Me.Close()
        Else
            Exit Sub
        End If
    End Sub
End Class
